
**********************************************************************************************************************
***************** Figure 3: Prevalence of Efficiency Related Goals in Antitrust Statutes		     *****************
**********************************************************************************************************************

clear
use CCL_Law_Data_Ver1.dta, clear

preserve
keep if year >1949
keep if year <2011
drop if regional_group==1
drop if competition_law_coded_ever==0
drop if competition_law_in_place==0


gen neither= 1
gen efficiency= 0
gen other= 0
gen  both= 0

replace efficiency=1 if goals_cosumer_welfa==1 | goals_efficiency ==1 | goals_total_welfare ==1 
replace efficiency = 0 if goals_protect_smallmid!=0| goals_protect_exports !=0|goals_industrial_policy !=0|goals_social_policy !=0|goals_development!=0| goals_other!=0

replace other = 1 if goals_protect_smallmid==1| goals_protect_exports ==1|goals_industrial_policy ==1|goals_social_policy ==1|goals_development==1| goals_other==1
replace other=0 if goals_cosumer_welfa==1 | goals_efficiency ==1 | goals_total_welfare ==1 

replace both =1 if goals_cosumer_welfa==1 | goals_efficiency ==1 | goals_total_welfare ==1 | goals_protect_smallmid==1| goals_protect_exports ==1|goals_industrial_policy ==1|goals_social_policy ==1|goals_development==1| goals_other==1
replace both =0 if efficiency==1 | other==1

replace neither =0 if efficiency==1 | both==1 | other ==1

summarize efficiency other both neither if year==2010
tab efficiency if year==2010
tab other if year==2010
tab both if year ==2010
tab neither if year ==2010

*** The percent of countries with goals that only have efficiency related goals is 17 / (17+20+41) = 22%

summarize goals_generic goals_cosumer_welfare goals_total_welfare goals_efficiency efficiency  if year==2010


egen EFF = mean(efficiency), by(year)
egen OTHER = mean(other), by(year)
egen BOTH = mean(both), by(year)
egen NEITHER = mean(neither), by(year)

egen tag = tag(year)
twoway line EFF OTHER BOTH NEITHER year if tag, sort saving(EU_converge) graphregion(color(white)) bgcolor(white) xtitle("Year") ytitle("Proportion") legend(label(1 "Efficiency-Related Goals") label(2 "Non-Efficiency Related Goals") label(3 "Both Types of Goals") label(4 "No Explicit Goals")) lpattern(1 _ shortdash_dot longdash) xla(1950(10)2010) yla(0(.1)1.05)
